home *** CD-ROM | disk | FTP | other *** search
/ KimStacks 7 / KimStacks CD-ROM 7 1993.iso / Products / Screensx1 / CompileIt! v.2.1 (.png) < prev    next >
Macintosh Picture Format  |  1992-02-15  |  17.1 KB  |  515x363  |  1-bit (2 colors)  |  [PICT/Cit2]
   ocr: Compilelt! 2.0 Byte 530 Pass 1 Symbols function replacestr oldStr. newStr. str Return a string with all occurrences of a specified sub-string - replaced by some other sub-string. Parameters: oldStr - sub-string to be replaced newStr - sub-string to replace with str -: string to be modified ifs str == empty then return str repeat get offset(oldStr. str) ifit= 0 then return str delete char it to (it + length(oldStr) - 1) ofstr put newStr before char it of str end repeat end replaceStr A Compile It Hnalysis Debugit! SANE